CD ROM Paradise Collection 4/CD ROM Paradise Collection 4 1995 Nov.iso/program/swagg_m.zip/MEMORY.SWG/0052_Moving Memory 2 Memory.pas

Pascal/Delphi Source File | 1994-05-26 | 298b | 17 lines

{This copies NumBytes from SourceOfs to DestOfs:}

Procedure MoveGfxMem(NumBytes, SourceOfs, DestOfs : Word); Assembler;
 Asm
  push  ds
  mov   ax,0a000h
  mov   ds,ax
  mov   es,ax
  mov   si,SourceOfs
  mov   di,DestOfs
  mov   cx,NumBytes
  cld
  rep   movsb
  pop   ds
 End;